* Ploting Inflation dynamics model parameter estimates

/*
*Run this block if stand alone. If commented out, it is because this will be run from _ricardo_master.do
set more off, perm
clear
graph drop _all
local dir "/Users/rreis/Dropbox/05Shared_folders/HRR/HRR_InflDisaster/Ricardo"  // RR's directory
*local dir "C:\Users\marin\Dropbox\HRR_InflDisaster\Ricardo"  // Marina's directory
cd `dir'
local region = "US" 	// set region US or EZ, so must run program twice
*/

local region `1'

///////////////////////////////// Graph style //////////////////////////////////
    //  ssc install grstyle
    set scheme s2color
    grstyle init

    grstyle color background white
    // gridlines
    grstyle color major_grid dimgray
    grstyle linewidth major_grid thin
    grstyle yesno draw_major_hgrid yes
    grstyle yesno grid_draw_min yes
    grstyle yesno grid_draw_max yes
    grstyle anglestyle vertical_tick horizontal grstyle color ci_area gs12%50
    // legend
    grstyle clockdir legend_position 6
    grstyle numstyle legend_cols 2
    grstyle linestyle legend none
////////////////////////////////////////////////////////////////////////////////


/////////////////////////////////////////
clear
import excel "$input/parameters_mdl101month.xlsx", sheet("`region'_mdl101_month") firstrow clear
generate date_ym = tm(2011m1) + _n -1
format %tm date_ym

twoway line pi_nL pi_nH pi_nn date_ym, ///
lw(thick thick thick) xtitle("month") legend(label(1 "p{subscript:dl}") label(2 "p{subscript:dh}") label(3 "p{subscript:nn}") size(*1.5) position(2) ring(0) row(1)) ylabel(0(0.05)0.5) tlabel(2011m1(24)2024m5, angle(45))

graph export "$figures/fig_model101`region'month.pdf", replace
